video s
begin:
pload top.gif,1
palette 1
pfade 0,1
pload topal.gif,1
palette 1
pload pb1.gif,2
pfade 0,2
spread 1,2
pload pb2.gif,2
pload black.gif,1
spread 2,1
pfade 0,2
spread 1,2
pload pb3.gif,2
spread 2,1
pfade 0,2
spread 1,2
pload pb4.gif,2
spread 2,1
pfade 0,2
spread 1,2
pload pb5.gif,2
spread 2,1
pfade 0,2
spread 1,2
;
pload pbend.gif,2
;palette 2
;pfade 0,2
color 0
;
mark 479
offset 0,-1,r
line 0,479,639,479
loop
palette 1
pfade 0,2
spread 1,2
;
waitkey 500
goto begin
exit